SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
CREATE PROCEDURE [dbo].[paEjecutarBajasDeServiciosDeSuplentesFuncionales]
@Subservicio INT,
@FechaBaja VARCHAR(10)
 AS

-- ACTUALIZACIONES
-- 25-02-2008 - Se agrego a la Norma, fecha de Registro y Usuario que la Genero
-- 25-02-2008 - Se agrego a los servicios y subservicios que bajan, la Norma y el Motivo de la baja


SET NOCOUNT ON

DECLARE @servicio INT
DECLARE @norma INT
DECLARE @Error INT
DECLARE @IdUsuario INT 

SET @Error = 0

BEGIN TRANSACTION tranBajaDeSuplentesFuncionales

SET @IdUsuario = dbo.sp_usuario(SYSTEM_USER)

INSERT INTO tb_normas (descripcion, tiponorma, seimprimio, FechaDeCarga, Usuario) VALUES ('Baja Masiva de Supl. Funcionales '+@FechaBaja, 2, 0, GetDate(), @IdUsuario)
SELECT @norma = @@IDENTITY, @Error = @@ERROR
IF @Error <> 0
	GOTO SALIR

SELECT @servicio = Servicioagente FROM tb_subServiciosAgentes WHERE idSubServicio = @subservicio

UPDATE tb_SubServiciosAgentes SET baja='S', fechabaja=DATEADD(DAY, -1, @FechaBaja), normafin = @norma WHERE idSubServicio = @subservicio
SELECT @Error = @@ERROR
IF @Error <> 0
	GOTO SALIR

UPDATE tb_ServiciosAgentes SET baja = 'S', fechabaja = DATEADD(DAY, -1, @FechaBaja), causabaja=21, normabaja = @norma WHERE idServicioagente = @servicio
SELECT @Error = @@ERROR
IF @Error <> 0
	GOTO SALIR

SALIR:
IF @Error = 0
	COMMIT TRANSACTION tranBajaDeSuplentesFuncionales
ELSE
	ROLLBACK TRANSACTION tranBajaDeSuplentesFuncionales
GO
GRANT EXECUTE ON  [dbo].[paEjecutarBajasDeServiciosDeSuplentesFuncionales] TO [PersonalDocente]
GO
